Delphi - el TAB por ENTER -------> ???

hola, he logrado con la ayuda de ustedes que el enter funcione como el tab , pero lo que pasa es que, si yo tengo dos Edit y un boton, quisiera que al darle enter al primer edit se pase al segundo edit el foco, y que al darle enter al segundo edit, se ejecute la accion del boton.
Espero su ayuda gracias..............

Para que funcione el TAB x ENTER
En el formulario
propiedad <KeyPreview=True>
Evento <OnKeyPress>
If (key = #13) //controles donde no quieres que lo haga
and not ActiveControl is TButton)
and not (ActiveControl is TMemo)
and not (ActiveControl is TDBMemo)
and not (ActiveControl is TDBGrid) then
begin
Formulario.Perform(WM_NEXTDLGCTL, 0, 0);
key := #0;
end;

Para ENTER en el edit que quieres pulsar boton:
En el evento <OnKeyPress> del segundo edit
If (Key = #13) then
begin
key:=#0;
boton.click;
end;

En la linea
and not ActiveControl is TButton)
debe ser
and not (ActiveControl is TButton)

y en la linea
Formulario.Perform(WM_NEXTDLGCTL, 0, 0);
sobra lo de Formulario, sobra con
Perform(WM_NEXTDLGCTL, 0, 0);

si, es lo que queria, gracias......